home *** CD-ROM | disk | FTP | other *** search
/ IRIX Base Documentation 2001 May / SGI IRIX Base Documentation 2001 May.iso / usr / share / catman / p_man / cat3 / libblas / asum.z / asum
Encoding:
Text File  |  1998-10-30  |  4.7 KB  |  133 lines
  1.  
  2.  
  3.  
  4. ____AAAASSSSUUUUMMMM((((3333FFFF))))                                                            ____AAAASSSSUUUUMMMM((((3333FFFF))))
  5.  
  6.  
  7.  
  8. NNNNAAAAMMMMEEEE
  9.      dasum, sasum, dzasum, scasum - BLAS level ONE L1 norm functions.
  10.  
  11. FFFFOOOORRRRTTTTRRRRAAAANNNN 77777777 SSSSYYYYNNNNOOOOPPPPSSSSIIIISSSS
  12.      ddddoooouuuubbbblllleeee pppprrrreeeecccciiiissssiiiioooonnnn  ddddaaaassssuuuummmm(((( nnnn,,,, xxxx,,,, iiiinnnnccccxxxx ))))
  13.      iiiinnnntttteeeeggggeeeerrrr           iiiinnnnccccxxxx,,,, nnnn
  14.      ddddoooouuuubbbblllleeee pppprrrreeeecccciiiissssiiiioooonnnn  xxxx(((( 1111 ))))
  15.  
  16.      rrrreeeeaaaallll              ssssaaaassssuuuummmm(((( nnnn,,,, xxxx,,,, iiiinnnnccccxxxx ))))
  17.      iiiinnnntttteeeeggggeeeerrrr           iiiinnnnccccxxxx,,,, nnnn
  18.      rrrreeeeaaaallll              xxxx(((( 1111 ))))
  19.  
  20.      ddddoooouuuubbbblllleeee pppprrrreeeecccciiiissssiiiioooonnnn  ddddzzzzaaaassssuuuummmm(((( nnnn,,,, xxxx,,,, iiiinnnnccccxxxx ))))
  21.      iiiinnnntttteeeeggggeeeerrrr           iiiinnnnccccxxxx,,,, nnnn
  22.      ccccoooommmmpppplllleeeexxxx****11116666        xxxx(((( 1111 ))))
  23.  
  24.      rrrreeeeaaaallll              ssssccccaaaassssuuuummmm(((( nnnn,,,, xxxx,,,, iiiinnnnccccxxxx ))))
  25.      iiiinnnntttteeeeggggeeeerrrr           iiiinnnnccccxxxx,,,, nnnn
  26.      ccccoooommmmpppplllleeeexxxx           xxxx(((( 1111 ))))
  27.  
  28.  
  29. CCCC SSSSYYYYNNNNOOOOPPPPSSSSIIIISSSS
  30.      ddddoooouuuubbbblllleeee ddddaaaassssuuuummmm(((( nnnn,,,, xxxx,,,, iiiinnnnccccxxxx ))))
  31.      IIIInnnntttteeeeggggeeeerrrr           iiiinnnnccccxxxx,,,, nnnn;;;;
  32.      ddddoooouuuubbbblllleeee            ((((****xxxx))))[[[[ nnnn ]]]];;;;
  33.  
  34.      ffffllllooooaaaatttt ssssaaaassssuuuummmm(((( nnnn,,,, xxxx,,,, iiiinnnnccccxxxx ))))
  35.      IIIInnnntttteeeeggggeeeerrrr           iiiinnnnccccxxxx,,,, nnnn;;;;
  36.      rrrreeeeaaaallll              ((((****xxxx))))[[[[ nnnn ]]]];;;;
  37.  
  38.      ddddoooouuuubbbblllleeee ddddzzzzaaaassssuuuummmm(((( nnnn,,,, xxxx,,,, iiiinnnnccccxxxx ))))
  39.      IIIInnnntttteeeeggggeeeerrrr           iiiinnnnccccxxxx,,,, nnnn;;;;
  40.      ZZZZoooommmmpppplllleeeexxxx           ((((****xxxx))))[[[[ nnnn ]]]];;;;
  41.  
  42.      ffffllllooooaaaatttt ssssccccaaaassssuuuummmm(((( nnnn,,,, xxxx,,,, iiiinnnnccccxxxx ))))
  43.      IIIInnnntttteeeeggggeeeerrrr           iiiinnnnccccxxxx,,,, nnnn;;;;
  44.  
  45.      CCCCoooommmmpppplllleeeexxxx           ((((****xxxx))))[[[[ nnnn ]]]];;;;
  46.  
  47. DDDDEEEESSSSCCCCRRRRIIIIPPPPTTTTIIIIOOOONNNN
  48.      ddddaaaassssuuuummmm, ssssaaaassssuuuummmm, ssssccccaaaassssuuuummmm, and ddddzzzzaaaassssuuuummmm, compute the L1 norm of the vector xxxx of
  49.      length nnnn and increment iiiinnnnccccxxxx.
  50.  
  51.          asum <--- Sum( Abs( X(i) ) ) )                      dasum and sasum
  52.  
  53.          asum <--- Sum( Abs(Real(X(i))) + Abs(Imag(X(i))) )  dzasum and scasum
  54.  
  55.  
  56. AAAAUUUUTTTTHHHHOOOORRRRSSSS
  57.           Jack Dongarra, linpack, 3/11/78.
  58.  
  59.  
  60.  
  61.  
  62.  
  63.                                                                         PPPPaaaaggggeeee 1111
  64.  
  65.  
  66.  
  67.  
  68.  
  69.  
  70. ____AAAASSSSUUUUMMMM((((3333FFFF))))                                                            ____AAAASSSSUUUUMMMM((((3333FFFF))))
  71.  
  72.  
  73.  
  74.  
  75.  
  76.  
  77.  
  78.  
  79.  
  80.  
  81.  
  82.  
  83.  
  84.  
  85.  
  86.  
  87.  
  88.  
  89.  
  90.  
  91.  
  92.  
  93.  
  94.  
  95.  
  96.  
  97.  
  98.  
  99.  
  100.  
  101.  
  102.  
  103.  
  104.  
  105.  
  106.  
  107.  
  108.  
  109.  
  110.  
  111.  
  112.  
  113.  
  114.  
  115.  
  116.  
  117.  
  118.  
  119.  
  120.  
  121.  
  122.  
  123.  
  124.  
  125.  
  126.                                                                         PPPPaaaaggggeeee 2222
  127.  
  128.  
  129.  
  130.  
  131.  
  132.  
  133.